home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The School House• / Astromacronomer ••• / BASIC Runtime / BASIC Runtime.rsrc / CODE_4.txt < prev    next >
Text File  |  1986-09-30  |  37KB  |  669 lines
  1. # near model CODE resource
  2. # jump table entries: 2912-2926 (15 of them)
  3. fn00000000:
  4. 00000000  4E56 FFF8                link       A6, -0x0008
  5. 00000004  48E7 70F0                movem.l    -[A7], D1,D2,D3,A0,A1,A2,A3
  6. 00000008  3D40 FFFC                move.w     [A6 - 0x4], D0
  7. 0000000C  42A7                     clr.l      -[A7]
  8. 0000000E  3F00                     move.w     -[A7], D0
  9. 00000010  42A7                     clr.l      -[A7]
  10. 00000012  7EFF                     moveq.l    D7, 0xFFFFFFFF
  11. 00000014  2F07                     move.l     -[A7], D7
  12. 00000016  A97C                     syscall    GetNewDialog
  13. 00000018  2B5F F304                move.l     [A5 - 0xCFC], [A7]+
  14. 0000001C  426E FFFE                clr.w      [A6 - 0x2]
  15. 00000020  612C                     bsr        +0x2E /* 0000004E */
  16. 00000022  2F2D F304                move.l     -[A7], [A5 - 0xCFC]
  17. 00000026  A915                     syscall    ShowWindow
  18. label00000028:
  19. 00000028  A9B4                     syscall    SystemTask
  20. 0000002A  42A7                     clr.l      -[A7]
  21. 0000002C  486E FFFE                pea.l      [A6 - 0x2]
  22. 00000030  A991                     syscall    ModalDialog
  23. 00000032  611A                     bsr        +0x1C /* 0000004E */
  24. 00000034  4A00                     tst.b      D0
  25. 00000036  67F0                     beq        -0xE /* 00000028 */
  26. 00000038  3F00                     move.w     -[A7], D0
  27. 0000003A  2F2D F304                move.l     -[A7], [A5 - 0xCFC]
  28. 0000003E  A983                     syscall    DisposeDialog
  29. 00000040  4EAD 08A2                jsr        [A5 + 0x8A2 /* export_272 */]
  30. 00000044  301F                     move.w     D0, [A7]+
  31. 00000046  4CDF 0F0E                movem.l    D1,D2,D3,A0,A1,A2,A3, [A7]+
  32. 0000004A  4E5E                     unlink     A6
  33. 0000004C  4E75                     rts
  34. fn0000004E:
  35. 0000004E  302E FFFC                move.w     D0, [A6 - 0x4]
  36. 00000052  0440 0100                subi.w     D0, 0x100
  37. 00000056  D040                     add.w      D0, D0
  38. 00000058  41FA 0010                lea.l      A0, [PC + 0x10 /* 0000006A, value 0xFFE2FFE2 */]
  39. 0000005C  D0F0 0000                add.w      A0, [A0 + D0.w]
  40. 00000060  302E FFFE                move.w     D0, [A6 - 0x2]
  41. 00000064  226D F304                movea.l    A1, [A5 - 0xCFC]
  42. 00000068  4ED0                     jmp        [A0]
  43. 0000006A  FFE2                     .invalid   <<F/7/7>>
  44. 0000006C  FFE2                     .invalid   <<F/7/7>>
  45. 0000006E  02EE                     .incomplete
  46. 00000070  FFE2                     .invalid   <<F/7/7>>
  47. 00000072  03BE                     bclr       <<invalid special address>>, D1
  48. 00000074  043E 0558                subi.b     <<invalid special address>>, 0x58 /* 'X' */
  49. 00000078  051E                     btst       [A6]+, D2
  50. export_364:
  51. 0000007A  526D FE32                addq.w     [A5 - 0x1CE], 1
  52. 0000007E  2F3C 0040 0040           move.l     -[A7], 0x400040 /* '@\0@' */
  53. 00000084  2F08                     move.l     -[A7], A0
  54. 00000086  2F09                     move.l     -[A7], A1
  55. 00000088  42A7                     clr.l      -[A7]
  56. 0000008A  2F0A                     move.l     -[A7], A2
  57. 0000008C  3F3C 0001                move.w     -[A7], 0x1
  58. 00000090  A9EA                     syscall    Pack3
  59. 00000092  536D FE32                subq.w     [A5 - 0x1CE], 1
  60. 00000096  4E75                     rts
  61. export_365:
  62. fn00000098:
  63. 00000098  526D FE32                addq.w     [A5 - 0x1CE], 1
  64. 0000009C  2F3C 0040 0040           move.l     -[A7], 0x400040 /* '@\0@' */
  65. 000000A2  42A7                     clr.l      -[A7]
  66. 000000A4  42A7                     clr.l      -[A7]
  67. 000000A6  3F01                     move.w     -[A7], D1
  68. 000000A8  2F09                     move.l     -[A7], A1
  69. 000000AA  42A7                     clr.l      -[A7]
  70. 000000AC  2F0A                     move.l     -[A7], A2
  71. 000000AE  3F3C 0002                move.w     -[A7], 0x2
  72. 000000B2  A9EA                     syscall    Pack3
  73. 000000B4  536D FE32                subq.w     [A5 - 0x1CE], 1
  74. 000000B8  4E75                     rts
  75. fn000000BA:
  76. 000000BA  2F3C 0040 0040           move.l     -[A7], 0x400040 /* '@\0@' */
  77. 000000C0  2F08                     move.l     -[A7], A0
  78. 000000C2  2F09                     move.l     -[A7], A1
  79. 000000C4  2F0B                     move.l     -[A7], A3
  80. 000000C6  2F0A                     move.l     -[A7], A2
  81. 000000C8  3F3C 0108                move.w     -[A7], 0x108
  82. 000000CC  42A7                     clr.l      -[A7]
  83. 000000CE  3F3C 0003                move.w     -[A7], 0x3
  84. 000000D2  A9EA                     syscall    Pack3
  85. 000000D4  4E75                     rts
  86. export_366:
  87. 000000D6  526D FE32                addq.w     [A5 - 0x1CE], 1
  88. 000000DA  2F00                     move.l     -[A7], D0
  89. 000000DC  303C 0100                move.w     D0, 0x100
  90. 000000E0  6100 FF1E                bsr        -0xE0 /* 00000000 */
  91. 000000E4  0C00 0003                cmpi.b     D0, 0x3
  92. 000000E8  6604                     bne        +0x6 /* 000000EE */
  93. 000000EA  4EED 02B2                jmp        [A5 + 0x2B2 /* export_82 */]
  94. label000000EE:
  95. 000000EE  0C00 0001                cmpi.b     D0, 0x1
  96. 000000F2  6604                     bne        +0x6 /* 000000F8 */
  97. 000000F4  6100 0136                bsr        +0x138 /* 0000022C */
  98. label000000F8:
  99. 000000F8  422D F062                clr.b      [A5 - 0xF9E]
  100. 000000FC  201F                     move.l     D0, [A7]+
  101. 000000FE  536D FE32                subq.w     [A5 - 0x1CE], 1
  102. 00000102  4E75                     rts
  103. 00000104  5445                     addq.w     D5, 2
  104. 00000106  5854                     addq.w     [A4], 4
  105. 00000108  4D53                     chk.w      D6, [A3]
  106. 0000010A  4243                     clr.w      D3
  107. 0000010C  4D53                     chk.w      D6, [A3]
  108. 0000010E  4244                     clr.w      D4
  109. 00000110  0000 4150                ori.b      D0, 0x50 /* 'P' */
  110. 00000114  504C                     addq.w     A4, 8
  111. export_368:
  112. 00000116  526D FE32                addq.w     [A5 - 0x1CE], 1
  113. 0000011A  4EAD 0932                jsr        [A5 + 0x932 /* export_290 */]
  114. 0000011E  6100 00C4                bsr        +0xC6 /* 000001E4 */
  115. 00000122  422D F099                clr.b      [A5 - 0xF67]
  116. 00000126  7201                     moveq.l    D1, 0x01
  117. 00000128  43FA FFE8                lea.l      A1, [PC - 0x18 /* 00000112, value 0x4150504C 'APPL' */]
  118. 0000012C  45ED EE08                lea.l      A2, [A5 - 0x11F8]
  119. 00000130  6100 FF66                bsr        -0x98 /* 00000098 */
  120. 00000134  4A2A 0000                tst.b      [A2 + 0x0]
  121. 00000138  6606                     bne        +0x8 /* 00000140 */
  122. 0000013A  536D FE32                subq.w     [A5 - 0x1CE], 1
  123. 0000013E  4E75                     rts
  124. label00000140:
  125. 00000140  41ED F36C                lea.l      A0, [A5 - 0xC94]
  126. 00000144  4268 001C                clr.w      [A0 + 0x1C]
  127. 00000148  42A8 0030                clr.l      [A0 + 0x30]
  128. 0000014C  42A8 000C                clr.l      [A0 + 0xC]
  129. 00000150  42A8 0012                clr.l      [A0 + 0x12]
  130. 00000154  302A 0006                move.w     D0, [A2 + 0x6]
  131. 00000158  3140 0016                move.w     [A0 + 0x16], D0
  132. 0000015C  3038 03F6                move.w     D0, [0x000003F6 /* FSFCBLen */]
  133. 00000160  5240                     addq.w     D0, 1
  134. 00000162  6604                     bne        +0x6 /* 00000168 */
  135. 00000164  A015                     syscall    SetVol/PBHSetVol/HSetVol
  136. 00000166  6004                     bra        +0x6 /* 0000016C */
  137. label00000168:
  138. 00000168  7003                     moveq.l    D0, 0x03
  139. 0000016A  A260                     syscall    FSDispatch/HFSDispatch, flags=2
  140. label0000016C:
  141. 0000016C  4EAD 0842                jsr        [A5 + 0x842 /* export_260 */]
  142. 00000170  4EAD 04DA                jsr        [A5 + 0x4DA /* export_151 */]
  143. 00000174  4EAD 092A                jsr        [A5 + 0x92A /* export_289 */]
  144. 00000178  4EAD 093A                jsr        [A5 + 0x93A /* export_291 */]
  145. 0000017C  4EAD 0942                jsr        [A5 + 0x942 /* export_292 */]
  146. 00000180  2E39 0000 0AEC           move.l     D7, [0x00000AEC /* AppParmHandle */]
  147. 00000186  6708                     beq        +0xA /* 00000190 */
  148. 00000188  2047                     movea.l    A0, D7
  149. 0000018A  2050                     movea.l    A0, [A0]
  150. 0000018C  4258                     clr.w      [A0]+
  151. 0000018E  4258                     clr.w      [A0]+
  152. label00000190:
  153. 00000190  41ED F210                lea.l      A0, [A5 - 0xDF0]
  154. 00000194  43EA 000A                lea.l      A1, [A2 + 0xA]
  155. 00000198  2089                     move.l     [A0], A1
  156. 0000019A  A9F2                     syscall    Launch/LaunchApplication
  157. export_369:
  158. 0000019C  526D FE32                addq.w     [A5 - 0x1CE], 1
  159. 000001A0  4EAD 0932                jsr        [A5 + 0x932 /* export_290 */]
  160. 000001A4  613E                     bsr        +0x40 /* 000001E4 */
  161. 000001A6  422D F099                clr.b      [A5 - 0xF67]
  162. 000001AA  7203                     moveq.l    D1, 0x03
  163. 000001AC  43FA FF56                lea.l      A1, [PC - 0xAA /* 00000104, value 0x54455854 'TEXT', cstring "TEXTMSBCMSBD" */]
  164. 000001B0  45ED EE08                lea.l      A2, [A5 - 0x11F8]
  165. 000001B4  6100 FEE2                bsr        -0x11C /* 00000098 */
  166. 000001B8  4A2A 0000                tst.b      [A2 + 0x0]
  167. 000001BC  6604                     bne        +0x6 /* 000001C2 */
  168. 000001BE  4EED 02B2                jmp        [A5 + 0x2B2 /* export_82 */]
  169. label000001C2:
  170. 000001C2  50ED F31C                st         [A5 - 0xCE4]
  171. 000001C6  3B6A 0006 F314           move.w     [A5 - 0xCEC], [A2 + 0x6]
  172. 000001CC  1B6A 0009 F31D           move.b     [A5 - 0xCE3], [A2 + 0x9]
  173. 000001D2  47EA 000A                lea.l      A3, [A2 + 0xA]
  174. 000001D6  4EAD 087A                jsr        [A5 + 0x87A /* export_267 */]
  175. 000001DA  7200                     moveq.l    D1, 0x00
  176. 000001DC  536D FE32                subq.w     [A5 - 0x1CE], 1
  177. 000001E0  4EED 0CBA                jmp        [A5 + 0xCBA /* export_403 */]
  178. fn000001E4:
  179. 000001E4  4EAD 0E12                jsr        [A5 + 0xE12 /* export_446 */]
  180. 000001E8  4EAD 0D12                jsr        [A5 + 0xD12 /* export_414 */]
  181. 000001EC  4EED 0CD2                jmp        [A5 + 0xCD2 /* export_406 */]
  182. export_370:
  183. 000001F0  526D FE32                addq.w     [A5 - 0x1CE], 1
  184. 000001F4  4EAD 02EA                jsr        [A5 + 0x2EA /* export_89 */]
  185. 000001F8  4AAD F318                tst.l      [A5 - 0xCE8]
  186. 000001FC  6732                     beq        +0x34 /* 00000230 */
  187. 000001FE  48E7 C010                movem.l    -[A7], D0,D1,A3
  188. 00000202  266D F318                movea.l    A3, [A5 - 0xCE8]
  189. 00000206  2653                     movea.l    A3, [A3]
  190. 00000208  4EAD 087A                jsr        [A5 + 0x87A /* export_267 */]
  191. 0000020C  50ED F31C                st         [A5 - 0xCE4]
  192. 00000210  3B6D F316 F314           move.w     [A5 - 0xCEC], [A5 - 0xCEA]
  193. 00000216  1B6D F31E F31D           move.b     [A5 - 0xCE3], [A5 - 0xCE2]
  194. 0000021C  422D F312                clr.b      [A5 - 0xCEE]
  195. 00000220  4CDF 0803                movem.l    D0,D1,A3, [A7]+
  196. 00000224  536D FE32                subq.w     [A5 - 0x1CE], 1
  197. 00000228  4EED 0CCA                jmp        [A5 + 0xCCA /* export_405 */]
  198. export_367:
  199. fn0000022C:
  200. 0000022C  526D FE32                addq.w     [A5 - 0x1CE], 1
  201. label00000230:
  202. 00000230  61B2                     bsr        -0x4C /* 000001E4 */
  203. 00000232  48E7 E0D0                movem.l    -[A7], D0,D1,D2,A0,A1,A3
  204. 00000236  4EAD 02EA                jsr        [A5 + 0x2EA /* export_89 */]
  205. 0000023A  0C2D 0002 F31F           cmpi.b     [A5 - 0xCE1], 0x2
  206. 00000240  6606                     bne        +0x8 /* 00000248 */
  207. 00000242  1B7C 0001 F31F           move.b     [A5 - 0xCE1], 0x1
  208. label00000248:
  209. 00000248  43FA FEC6                lea.l      A1, [PC - 0x13A /* 00000110, value 0x4150 'AP', cstring "" */]
  210. 0000024C  202D F318                move.l     D0, [A5 - 0xCE8]
  211. 00000250  670A                     beq        +0xC /* 0000025C */
  212. 00000252  2040                     movea.l    A0, D0
  213. 00000254  A029                     syscall    HLock
  214. 00000256  226D F318                movea.l    A1, [A5 - 0xCE8]
  215. 0000025A  2251                     movea.l    A1, [A1]
  216. label0000025C:
  217. 0000025C  303C 0142                move.w     D0, 0x142
  218. 00000260  6100 03CE                bsr        +0x3D0 /* 00000630 */
  219. 00000264  204B                     movea.l    A0, A3
  220. 00000266  A029                     syscall    HLock
  221. 00000268  2053                     movea.l    A0, [A3]
  222. 0000026A  45ED EE08                lea.l      A2, [A5 - 0x11F8]
  223. 0000026E  47FA 004E                lea.l      A3, [PC + 0x4E /* 000002BE, value 0x205F225F ' _\"_' */]
  224. 00000272  422D F312                clr.b      [A5 - 0xCEE]
  225. 00000276  6100 FE42                bsr        -0x1BC /* 000000BA */
  226. 0000027A  303C 0142                move.w     D0, 0x142
  227. 0000027E  6100 03B0                bsr        +0x3B2 /* 00000630 */
  228. 00000282  204B                     movea.l    A0, A3
  229. 00000284  A02A                     syscall    HUnlock
  230. 00000286  202D F318                move.l     D0, [A5 - 0xCE8]
  231. 0000028A  6704                     beq        +0x6 /* 00000290 */
  232. 0000028C  2040                     movea.l    A0, D0
  233. 0000028E  A02A                     syscall    HUnlock
  234. label00000290:
  235. 00000290  4A2A 0000                tst.b      [A2 + 0x0]
  236. 00000294  6604                     bne        +0x6 /* 0000029A */
  237. 00000296  4EED 02B2                jmp        [A5 + 0x2B2 /* export_82 */]
  238. label0000029A:
  239. 0000029A  47EA 000A                lea.l      A3, [A2 + 0xA]
  240. 0000029E  4EAD 087A                jsr        [A5 + 0x87A /* export_267 */]
  241. 000002A2  50ED F31C                st         [A5 - 0xCE4]
  242. 000002A6  3B6A 0006 F314           move.w     [A5 - 0xCEC], [A2 + 0x6]
  243. 000002AC  1B6A 0009 F31D           move.b     [A5 - 0xCE3], [A2 + 0x9]
  244. 000002B2  4CDF 0B07                movem.l    D0,D1,D2,A0,A1,A3, [A7]+
  245. 000002B6  536D FE32                subq.w     [A5 - 0x1CE], 1
  246. 000002BA  4EED 0CCA                jmp        [A5 + 0xCCA /* export_405 */]
  247. 000002BE  205F                     movea.l    A0, [A7]+
  248. 000002C0  225F                     movea.l    A1, [A7]+
  249. 000002C2  301F                     move.w     D0, [A7]+
  250. 000002C4  3E80                     move.w     [A7], D0
  251. 000002C6  2F08                     move.l     -[A7], A0
  252. 000002C8  4A40                     tst.w      D0
  253. 000002CA  6B28                     bmi        +0x2A /* 000002F4 */
  254. 000002CC  0C40 000C                cmpi.w     D0, 0xC
  255. 000002D0  6612                     bne        +0x14 /* 000002E4 */
  256. 000002D2  3200                     move.w     D1, D0
  257. 000002D4  7001                     moveq.l    D0, 0x01
  258. 000002D6  902D F312                sub.b      D0, [A5 - 0xCEE]
  259. 000002DA  1B40 F312                move.b     [A5 - 0xCEE], D0
  260. 000002DE  6100 0312                bsr        +0x314 /* 000005F2 */
  261. 000002E2  6022                     bra        +0x24 /* 00000306 */
  262. label000002E4:
  263. 000002E4  0440 0009                subi.w     D0, 0x9 /* '\t' */
  264. 000002E8  652C                     bcs        +0x2E /* 00000316 */
  265. 000002EA  0C00 0003                cmpi.b     D0, 0x3
  266. 000002EE  6426                     bcc        +0x28 /* 00000316 */
  267. 000002F0  1B40 F31F                move.b     [A5 - 0xCE1], D0
  268. label000002F4:
  269. 000002F4  7000                     moveq.l    D0, 0x00
  270. 000002F6  102D F31F                move.b     D0, [A5 - 0xCE1]
  271. 000002FA  0600 0009                addi.b     D0, 0x9 /* '\t' */
  272. 000002FE  7209                     moveq.l    D1, 0x09
  273. 00000300  740B                     moveq.l    D2, 0x0B
  274. 00000302  6100 02DE                bsr        +0x2E0 /* 000005E2 */
  275. label00000306:
  276. 00000306  7000                     moveq.l    D0, 0x00
  277. 00000308  4A2D F31F                tst.b      [A5 - 0xCE1]
  278. 0000030C  6602                     bne        +0x4 /* 00000310 */
  279. 0000030E  5300                     subq.b     D0, 1
  280. label00000310:
  281. 00000310  720C                     moveq.l    D1, 0x0C
  282. 00000312  6100 02EE                bsr        +0x2F0 /* 00000602 */
  283. label00000316:
  284. 00000316  4E75                     rts
  285. export_372:
  286. 00000318  526D FE32                addq.w     [A5 - 0x1CE], 1
  287. 0000031C  48E7 1080                movem.l    -[A7], D3,A0
  288. 00000320  41FA 0387                lea.l      A0, [PC + 0x387 /* 000006A9, value 0x75000102, cstring "u" */]
  289. 00000324  362D F05C                move.w     D3, [A5 - 0xFA4]
  290. 00000328  5343                     subq.w     D3, 1
  291. 0000032A  0C43 004A                cmpi.w     D3, 0x4A /* 'J' */
  292. 0000032E  6502                     bcs        +0x4 /* 00000332 */
  293. 00000330  7614                     moveq.l    D3, 0x14
  294. label00000332:
  295. 00000332  1630 3001                move.b     D3, [A0 + D3.w + 0x1]
  296. 00000336  0643 0100                addi.w     D3, 0x100
  297. 0000033A  610A                     bsr        +0xC /* 00000346 */
  298. 0000033C  4CDF 0108                movem.l    D3,A0, [A7]+
  299. 00000340  536D FE32                subq.w     [A5 - 0x1CE], 1
  300. 00000344  4E75                     rts
  301. export_373:
  302. fn00000346:
  303. 00000346  526D FE32                addq.w     [A5 - 0x1CE], 1
  304. 0000034A  303C 0102                move.w     D0, 0x102
  305. 0000034E  6100 FCB0                bsr        -0x34E /* 00000000 */
  306. 00000352  536D FE32                subq.w     [A5 - 0x1CE], 1
  307. 00000356  4E75                     rts
  308. 00000358  2F0B                     move.l     -[A7], A3
  309. 0000035A  4A00                     tst.b      D0
  310. 0000035C  6620                     bne        +0x22 /* 0000037E */
  311. 0000035E  7202                     moveq.l    D1, 0x02
  312. 00000360  6100 02AA                bsr        +0x2AC /* 0000060C */
  313. 00000364  2F08                     move.l     -[A7], A0
  314. 00000366  3003                     move.w     D0, D3
  315. 00000368  6100 02C6                bsr        +0x2C8 /* 00000630 */
  316. 0000036C  204B                     movea.l    A0, A3
  317. 0000036E  A029                     syscall    HLock
  318. 00000370  4EAD 06DA                jsr        [A5 + 0x6DA /* export_215 */]
  319. 00000374  2F13                     move.l     -[A7], [A3]
  320. 00000376  A98F                     syscall    SetDialogItemText/SetIText
  321. 00000378  204B                     movea.l    A0, A3
  322. 0000037A  A02A                     syscall    HUnlock
  323. 0000037C  7000                     moveq.l    D0, 0x00
  324. label0000037E:
  325. 0000037E  265F                     movea.l    A3, [A7]+
  326. 00000380  4E75                     rts
  327. export_374:
  328. 00000382  526D FE32                addq.w     [A5 - 0x1CE], 1
  329. 00000386  4E56 FFEC                link       A6, -0x0014
  330. 0000038A  48E7 F0F0                movem.l    -[A7], D0,D1,D2,D3,A0,A1,A2,A3
  331. 0000038E  4A2D F24B                tst.b      [A5 - 0xDB5]
  332. 00000392  6770                     beq        +0x72 /* 00000404 */
  333. 00000394  303C 0103                move.w     D0, 0x103
  334. 00000398  42A7                     clr.l      -[A7]
  335. 0000039A  3F3C 0103                move.w     -[A7], 0x103
  336. 0000039E  42A7                     clr.l      -[A7]
  337. 000003A0  7EFF                     moveq.l    D7, 0xFFFFFFFF
  338. 000003A2  2F07                     move.l     -[A7], D7
  339. 000003A4  A97C                     syscall    GetNewDialog
  340. 000003A6  2B5F F304                move.l     [A5 - 0xCFC], [A7]+
  341. 000003AA  2F2D F304                move.l     -[A7], [A5 - 0xCFC]
  342. 000003AE  A915                     syscall    ShowWindow
  343. 000003B0  2F2D F304                move.l     -[A7], [A5 - 0xCFC]
  344. 000003B4  A981                     syscall    DrawDialog
  345. 000003B6  4EAD 06DA                jsr        [A5 + 0x6DA /* export_215 */]
  346. 000003BA  486E FFEC                pea.l      [A6 - 0x14]
  347. 000003BE  A972                     syscall    GetMouse
  348. label000003C0:
  349. 000003C0  A9B4                     syscall    SystemTask
  350. 000003C2  4267                     clr.w      -[A7]
  351. 000003C4  3F3C 003E                move.w     -[A7], 0x3E /* '>' */
  352. 000003C8  486E FFF0                pea.l      [A6 - 0x10]
  353. 000003CC  A971                     syscall    EventAvail
  354. 000003CE  301F                     move.w     D0, [A7]+
  355. 000003D0  6628                     bne        +0x2A /* 000003FA */
  356. 000003D2  486E FFF0                pea.l      [A6 - 0x10]
  357. 000003D6  A976                     syscall    GetKeys
  358. 000003D8  41EE FFF0                lea.l      A0, [A6 - 0x10]
  359. 000003DC  303C 0007                move.w     D0, 0x7
  360. label000003E0:
  361. 000003E0  4A58                     tst.w      [A0]+
  362. 000003E2  6616                     bne        +0x18 /* 000003FA */
  363. 000003E4  51C8 FFFA                dbf        D0, -0x8 /* 000003E0 */
  364. 000003E8  486E FFF0                pea.l      [A6 - 0x10]
  365. 000003EC  A972                     syscall    GetMouse
  366. 000003EE  222E FFF0                move.l     D1, [A6 - 0x10]
  367. 000003F2  B2AE FFEC                cmp.l      D1, [A6 - 0x14]
  368. 000003F6  6602                     bne        +0x4 /* 000003FA */
  369. 000003F8  60C6                     bra        -0x38 /* 000003C0 */
  370. label000003FA:
  371. 000003FA  2F2D F304                move.l     -[A7], [A5 - 0xCFC]
  372. 000003FE  A983                     syscall    DisposeDialog
  373. 00000400  4EAD 08A2                jsr        [A5 + 0x8A2 /* export_272 */]
  374. label00000404:
  375. 00000404  4CDF 0F0F                movem.l    D0,D1,D2,D3,A0,A1,A2,A3, [A7]+
  376. 00000408  536D FE32                subq.w     [A5 - 0x1CE], 1
  377. 0000040C  4E5E                     unlink     A6
  378. 0000040E  4E75                     rts
  379. export_375:
  380. 00000410  526D FE32                addq.w     [A5 - 0x1CE], 1
  381. 00000414  303C 0104                move.w     D0, 0x104
  382. 00000418  6100 FBE6                bsr        -0x418 /* 00000000 */
  383. 0000041C  206D FC88                movea.l    A0, [A5 - 0x378]
  384. 00000420  4E90                     jsr        [A0]
  385. 00000422  536D FE32                subq.w     [A5 - 0x1CE], 1
  386. 00000426  4E75                     rts
  387. 00000428  4A00                     tst.b      D0
  388. 0000042A  6604                     bne        +0x6 /* 00000430 */
  389. 0000042C  612E                     bsr        +0x30 /* 0000045C */
  390. 0000042E  6028                     bra        +0x2A /* 00000458 */
  391. label00000430:
  392. 00000430  0C00 0001                cmpi.b     D0, 0x1
  393. 00000434  6606                     bne        +0x8 /* 0000043C */
  394. 00000436  41FA 0122                lea.l      A0, [PC + 0x122 /* 0000055A, value 0x4EED08EA */]
  395. 0000043A  6010                     bra        +0x12 /* 0000044C */
  396. label0000043C:
  397. 0000043C  0C00 0002                cmpi.b     D0, 0x2
  398. 00000440  6606                     bne        +0x8 /* 00000448 */
  399. 00000442  4EAD 09D2                jsr        [A5 + 0x9D2 /* export_310 */]
  400. 00000446  6010                     bra        +0x12 /* 00000458 */
  401. label00000448:
  402. 00000448  41FA FC02                lea.l      A0, [PC - 0x3FE /* 0000004C, value 0x4E75302E 'Nu0.' */]
  403. label0000044C:
  404. 0000044C  4EAD 08E2                jsr        [A5 + 0x8E2 /* export_280 */]
  405. 00000450  2B48 FC88                move.l     [A5 - 0x378], A0
  406. 00000454  50C0                     st         D0
  407. 00000456  6002                     bra        +0x4 /* 0000045A */
  408. label00000458:
  409. 00000458  4200                     clr.b      D0
  410. label0000045A:
  411. 0000045A  4E75                     rts
  412. fn0000045C:
  413. 0000045C  206D FC8C                movea.l    A0, [A5 - 0x374]
  414. 00000460  A025                     syscall    GetHandleSize
  415. 00000462  6722                     beq        +0x24 /* 00000486 */
  416. 00000464  7202                     moveq.l    D1, 0x02
  417. 00000466  6100 01A4                bsr        +0x1A6 /* 0000060C */
  418. 0000046A  2F08                     move.l     -[A7], A0
  419. 0000046C  246D FC8C                movea.l    A2, [A5 - 0x374]
  420. 00000470  2F12                     move.l     -[A7], [A2]
  421. 00000472  3E3C 018F                move.w     D7, 0x18F
  422. 00000476  4EAD 0862                jsr        [A5 + 0x862 /* export_264 */]
  423. 0000047A  2F09                     move.l     -[A7], A1
  424. 0000047C  3F01                     move.w     -[A7], D1
  425. 0000047E  4267                     clr.w      -[A7]
  426. 00000480  3F3C FFFF                move.w     -[A7], 0xFFFF
  427. 00000484  A97E                     syscall    SelectDialogItemText/SelIText
  428. label00000486:
  429. 00000486  4E75                     rts
  430. export_376:
  431. 00000488  526D FE32                addq.w     [A5 - 0x1CE], 1
  432. 0000048C  51ED FCFA                sf         [A5 - 0x306]
  433. 00000490  51ED FCFB                sf         [A5 - 0x305]
  434. 00000494  303C 0105                move.w     D0, 0x105
  435. 00000498  6100 FB66                bsr        -0x498 /* 00000000 */
  436. 0000049C  206D FC88                movea.l    A0, [A5 - 0x378]
  437. 000004A0  4E90                     jsr        [A0]
  438. 000004A2  536D FE32                subq.w     [A5 - 0x1CE], 1
  439. 000004A6  4E75                     rts
  440. 000004A8  4A00                     tst.b      D0
  441. 000004AA  6612                     bne        +0x14 /* 000004BE */
  442. 000004AC  61AE                     bsr        -0x50 /* 0000045C */
  443. 000004AE  422D FD04                clr.b      [A5 - 0x2FC]
  444. 000004B2  7000                     moveq.l    D0, 0x00
  445. 000004B4  206D FC90                movea.l    A0, [A5 - 0x370]
  446. 000004B8  A027                     syscall    ReallocateHandle
  447. 000004BA  6000 0096                bra        +0x98 /* 00000552 */
  448. label000004BE:
  449. 000004BE  0C00 0001                cmpi.b     D0, 0x1
  450. 000004C2  6618                     bne        +0x1A /* 000004DC */
  451. 000004C4  4A2D FD04                tst.b      [A5 - 0x2FC]
  452. 000004C8  6634                     bne        +0x36 /* 000004FE */
  453. 000004CA  2F09                     move.l     -[A7], A1
  454. 000004CC  3F3C 0004                move.w     -[A7], 0x4
  455. 000004D0  42A7                     clr.l      -[A7]
  456. 000004D2  3E3C 017E                move.w     D7, 0x17E
  457. 000004D6  4EAD 0862                jsr        [A5 + 0x862 /* export_264 */]
  458. 000004DA  6016                     bra        +0x18 /* 000004F2 */
  459. label000004DC:
  460. 000004DC  0C00 0002                cmpi.b     D0, 0x2
  461. 000004E0  6606                     bne        +0x8 /* 000004E8 */
  462. 000004E2  4EAD 09D2                jsr        [A5 + 0x9D2 /* export_310 */]
  463. 000004E6  606A                     bra        +0x6C /* 00000552 */
  464. label000004E8:
  465. 000004E8  0C00 0004                cmpi.b     D0, 0x4
  466. 000004EC  660A                     bne        +0xC /* 000004F8 */
  467. 000004EE  4EAD 081A                jsr        [A5 + 0x81A /* export_255 */]
  468. label000004F2:
  469. 000004F2  50ED FD04                st         [A5 - 0x2FC]
  470. 000004F6  605A                     bra        +0x5C /* 00000552 */
  471. label000004F8:
  472. 000004F8  0C00 0005                cmpi.b     D0, 0x5
  473. 000004FC  6610                     bne        +0x12 /* 0000050E */
  474. label000004FE:
  475. 000004FE  41FA 005E                lea.l      A0, [PC + 0x5E /* 0000055E, value 0x4EED09CA */]
  476. 00000502  4A2D FCFB                tst.b      [A5 - 0x305]
  477. 00000506  673E                     beq        +0x40 /* 00000546 */
  478. 00000508  41FA 004C                lea.l      A0, [PC + 0x4C /* 00000556, value 0x4EED09C2 */]
  479. 0000050C  6038                     bra        +0x3A /* 00000546 */
  480. label0000050E:
  481. 0000050E  0C00 0006                cmpi.b     D0, 0x6
  482. 00000512  6612                     bne        +0x14 /* 00000526 */
  483. 00000514  0A2D 0001 FCFA           xori.b     [A5 - 0x306], 0x1
  484. 0000051A  4240                     clr.w      D0
  485. 0000051C  102D FCFA                move.b     D0, [A5 - 0x306]
  486. 00000520  323C 0006                move.w     D1, 0x6
  487. 00000524  6016                     bra        +0x18 /* 0000053C */
  488. label00000526:
  489. 00000526  0C00 0007                cmpi.b     D0, 0x7
  490. 0000052A  6616                     bne        +0x18 /* 00000542 */
  491. 0000052C  0A2D 0001 FCFB           xori.b     [A5 - 0x305], 0x1
  492. 00000532  4240                     clr.w      D0
  493. 00000534  102D FCFB                move.b     D0, [A5 - 0x305]
  494. 00000538  323C 0007                move.w     D1, 0x7
  495. label0000053C:
  496. 0000053C  6100 00B4                bsr        +0xB6 /* 000005F2 */
  497. 00000540  6010                     bra        +0x12 /* 00000552 */
  498. label00000542:
  499. 00000542  41FA FB08                lea.l      A0, [PC - 0x4F8 /* 0000004C, value 0x4E75302E 'Nu0.' */]
  500. label00000546:
  501. 00000546  4EAD 08E2                jsr        [A5 + 0x8E2 /* export_280 */]
  502. 0000054A  2B48 FC88                move.l     [A5 - 0x378], A0
  503. 0000054E  50C0                     st         D0
  504. 00000550  6002                     bra        +0x4 /* 00000554 */
  505. label00000552:
  506. 00000552  4200                     clr.b      D0
  507. label00000554:
  508. 00000554  4E75                     rts
  509. 00000556  4EED 09C2                jmp        [A5 + 0x9C2 /* export_308 */]
  510. 0000055A  4EED 08EA                jmp        [A5 + 0x8EA /* export_281 */]
  511. 0000055E  4EED 09CA                jmp        [A5 + 0x9CA /* export_309 */]
  512. 00000562  526D FE32                addq.w     [A5 - 0x1CE], 1
  513. 00000566  51ED FCFD                sf         [A5 - 0x303]
  514. 0000056A  51ED FCFC                sf         [A5 - 0x304]
  515. 0000056E  4EAD 08DA                jsr        [A5 + 0x8DA /* export_279 */]
  516. 00000572  4EAD 09DA                jsr        [A5 + 0x9DA /* export_311 */]
  517. 00000576  4EAD 09BA                jsr        [A5 + 0x9BA /* export_307 */]
  518. 0000057A  303C 0107                move.w     D0, 0x107
  519. 0000057E  6100 FA80                bsr        -0x57E /* 00000000 */
  520. 00000582  536D FE32                subq.w     [A5 - 0x1CE], 1
  521. 00000586  4E75                     rts
  522. 00000588  4A00                     tst.b      D0
  523. 0000058A  6606                     bne        +0x8 /* 00000592 */
  524. 0000058C  4EAD 026A                jsr        [A5 + 0x26A /* export_73 */]
  525. 00000590  601C                     bra        +0x1E /* 000005AE */
  526. label00000592:
  527. 00000592  0C00 0001                cmpi.b     D0, 0x1
  528. 00000596  6602                     bne        +0x4 /* 0000059A */
  529. 00000598  6010                     bra        +0x12 /* 000005AA */
  530. label0000059A:
  531. 0000059A  0C00 0002                cmpi.b     D0, 0x2
  532. 0000059E  6606                     bne        +0x8 /* 000005A6 */
  533. 000005A0  50ED FCFD                st         [A5 - 0x303]
  534. 000005A4  6004                     bra        +0x6 /* 000005AA */
  535. label000005A6:
  536. 000005A6  50ED FCFC                st         [A5 - 0x304]
  537. label000005AA:
  538. 000005AA  4EAD 08E2                jsr        [A5 + 0x8E2 /* export_280 */]
  539. label000005AE:
  540. 000005AE  4E75                     rts
  541. 000005B0  526D FE32                addq.w     [A5 - 0x1CE], 1
  542. 000005B4  303C 0106                move.w     D0, 0x106
  543. 000005B8  6100 FA46                bsr        -0x5B8 /* 00000000 */
  544. 000005BC  536D FE32                subq.w     [A5 - 0x1CE], 1
  545. 000005C0  4E75                     rts
  546. 000005C2  4A00                     tst.b      D0
  547. 000005C4  6608                     bne        +0xA /* 000005CE */
  548. 000005C6  4EAD 026A                jsr        [A5 + 0x26A /* export_73 */]
  549. 000005CA  4EAD 06DA                jsr        [A5 + 0x6DA /* export_215 */]
  550. label000005CE:
  551. 000005CE  4E75                     rts
  552. export_377:
  553. 000005D0  526D FE32                addq.w     [A5 - 0x1CE], 1
  554. 000005D4  303C 0101                move.w     D0, 0x101
  555. 000005D8  6100 FA26                bsr        -0x5D8 /* 00000000 */
  556. 000005DC  536D FE32                subq.w     [A5 - 0x1CE], 1
  557. 000005E0  4E75                     rts
  558. fn000005E2:
  559. 000005E2  3F00                     move.w     -[A7], D0
  560. label000005E4:
  561. 000005E4  7000                     moveq.l    D0, 0x00
  562. 000005E6  610A                     bsr        +0xC /* 000005F2 */
  563. 000005E8  5241                     addq.w     D1, 1
  564. 000005EA  B441                     cmp.w      D2, D1
  565. 000005EC  64F6                     bcc        -0x8 /* 000005E4 */
  566. 000005EE  321F                     move.w     D1, [A7]+
  567. 000005F0  7001                     moveq.l    D0, 0x01
  568. fn000005F2:
  569. 000005F2  6118                     bsr        +0x1A /* 0000060C */
  570. 000005F4  2F08                     move.l     -[A7], A0
  571. 000005F6  3F00                     move.w     -[A7], D0
  572. 000005F8  3E3C 0163                move.w     D7, 0x163
  573. 000005FC  4EAD 0862                jsr        [A5 + 0x862 /* export_264 */]
  574. 00000600  4E75                     rts
  575. fn00000602:
  576. 00000602  6108                     bsr        +0xA /* 0000060C */
  577. 00000604  2F08                     move.l     -[A7], A0
  578. 00000606  3F00                     move.w     -[A7], D0
  579. 00000608  A95D                     syscall    HiliteControl
  580. 0000060A  4E75                     rts
  581. fn0000060C:
  582. 0000060C  4E56 FFF2                link       A6, -0x000E
  583. 00000610  2F09                     move.l     -[A7], A1
  584. 00000612  3F01                     move.w     -[A7], D1
  585. 00000614  486E FFFE                pea.l      [A6 - 0x2]
  586. 00000618  486E FFFA                pea.l      [A6 - 0x6]
  587. 0000061C  486E FFF2                pea.l      [A6 - 0xE]
  588. 00000620  3E3C 018D                move.w     D7, 0x18D
  589. 00000624  4EAD 0862                jsr        [A5 + 0x862 /* export_264 */]
  590. 00000628  206E FFFA                movea.l    A0, [A6 - 0x6]
  591. 0000062C  4E5E                     unlink     A6
  592. 0000062E  4E75                     rts
  593. export_371:
  594. fn00000630:
  595. 00000630  526D FE32                addq.w     [A5 - 0x1CE], 1
  596. 00000634  42A7                     clr.l      -[A7]
  597. 00000636  2F3C 5354 5220           move.l     -[A7], 0x53545220 /* 'STR ' */
  598. 0000063C  3F00                     move.w     -[A7], D0
  599. 0000063E  3E3C 01A0                move.w     D7, 0x1A0
  600. 00000642  4EAD 0862                jsr        [A5 + 0x862 /* export_264 */]
  601. 00000646  265F                     movea.l    A3, [A7]+
  602. 00000648  2E0B                     move.l     D7, A3
  603. 0000064A  6604                     bne        +0x6 /* 00000650 */
  604. 0000064C  4EED 040A                jmp        [A5 + 0x40A /* export_125 */]
  605. label00000650:
  606. 00000650  536D FE32                subq.w     [A5 - 0x1CE], 1
  607. 00000654  4E75                     rts
  608. export_378:
  609. 00000656  526D FE32                addq.w     [A5 - 0x1CE], 1
  610. 0000065A  48E7 E0D0                movem.l    -[A7], D0,D1,D2,A0,A1,A3
  611. 0000065E  3200                     move.w     D1, D0
  612. 00000660  3400                     move.w     D2, D0
  613. 00000662  0242 3FFF                andi.w     D2, 0x3FFF
  614. 00000666  2F2D F072                move.l     -[A7], [A5 - 0xF8E]
  615. 0000066A  42AD F072                clr.l      [A5 - 0xF8E]
  616. 0000066E  3001                     move.w     D0, D1
  617. 00000670  0240 8000                andi.w     D0, 0x8000
  618. 00000674  6704                     beq        +0x6 /* 0000067A */
  619. 00000676  4EAD 056A                jsr        [A5 + 0x56A /* export_169 */]
  620. label0000067A:
  621. 0000067A  3002                     move.w     D0, D2
  622. 0000067C  61B2                     bsr        -0x4C /* 00000630 */
  623. 0000067E  3F01                     move.w     -[A7], D1
  624. 00000680  2F0B                     move.l     -[A7], A3
  625. 00000682  204B                     movea.l    A0, A3
  626. 00000684  A029                     syscall    HLock
  627. 00000686  2653                     movea.l    A3, [A3]
  628. 00000688  4EAD 0872                jsr        [A5 + 0x872 /* export_266 */]
  629. 0000068C  205F                     movea.l    A0, [A7]+
  630. 0000068E  A02A                     syscall    HUnlock
  631. 00000690  321F                     move.w     D1, [A7]+
  632. 00000692  0241 4000                andi.w     D1, 0x4000 /* '@\0' */
  633. 00000696  6704                     beq        +0x6 /* 0000069C */
  634. 00000698  4EAD 006A                jsr        [A5 + 0x6A /* export_9 */]
  635. label0000069C:
  636. 0000069C  2B5F F072                move.l     [A5 - 0xF8E], [A7]+
  637. 000006A0  4CDF 0B07                movem.l    D0,D1,D2,A0,A1,A3, [A7]+
  638. 000006A4  536D FE32                subq.w     [A5 - 0x1CE], 1
  639. 000006A8  4E75                     rts
  640. 000006AA  0001 0203                ori.b      D1, 0x3
  641. 000006AE  0405 0607                subi.b     D5, 0x7
  642. 000006B2  0809 0A0B                btst.b     A1, 0xB
  643. 000006B6  0C36 0D0E 0F10           cmpi.b     [A6 + D0 * 8], 0xE
  644. 000006BC  1112                     move.b     -[A0], [A2]
  645. 000006BE  1314                     move.b     -[A1], [A4]
  646. 000006C0  1513                     move.b     -[A2], [A3]
  647. 000006C2  1316                     move.b     -[A1], [A6]
  648. 000006C4  1313                     move.b     -[A1], [A3]
  649. 000006C6  1718                     move.b     -[A3], [A0]+
  650. 000006C8  1313                     move.b     -[A1], [A3]
  651. 000006CA  1945 1A1B                move.b     [A4 + 0x1A1B], D5
  652. 000006CE  1C1D                     move.b     D6, [A5]+
  653. 000006D0  1313                     move.b     -[A1], [A3]
  654. 000006D2  1313                     move.b     -[A1], [A3]
  655. 000006D4  1313                     move.b     -[A1], [A3]
  656. 000006D6  1313                     move.b     -[A1], [A3]
  657. 000006D8  1313                     move.b     -[A1], [A3]
  658. 000006DA  131E                     move.b     -[A1], [A6]+
  659. 000006DC  1F20                     move.b     -[A7], -[A0]
  660. 000006DE  2122                     move.l     -[A0], -[A2]
  661. 000006E0  2313                     move.l     -[A1], [A3]
  662. 000006E2  2425                     move.l     D2, -[A5]
  663. 000006E4  1313                     move.b     -[A1], [A3]
  664. 000006E6  2627                     move.l     D3, -[A7]
  665. 000006E8  2829 132A                move.l     D4, [A1 + 0x132A]
  666. 000006EC  2B2C 132D                move.l     -[A5], [A4 + 0x132D]
  667. 000006F0  1313                     move.b     -[A1], [A3]
  668. 000006F2  4438                     .incomplete
  669.